(defpackage :test-systems-load-order
  (:use :cl :cl-fast-ecs))
(in-package :test-systems-load-order)

(defcomponent display
  (x nil :type t))

(defsystem calculate
  (:components-ro (display)))

(defsystem draw
  (:components-ro (display)
   :after (calculate)))
